perm filename CHART.UNF[TIM,LSP]4 blob
sn#768076 filedate 1984-09-12 generic text, type T, neo UTF8
'(THIS IS THE UNFASL FOR ((DSK (TIM LSP)) CHART LSP))
'(ASSEMBLED BY FASLAP /392)
'(COMPILED BY LISP COMPILER /936 COMAUX /25 PHAS1 /84 MAKLAP /80 INITIA /117)
;COMPILED ON SEPTEMBER 12, 1984, AT 10:42 AM
;Loading DEFSTRUCT 280
(COMMENT **FASL** 0. (LAP |STRING-LENGTH MACRO| SUBR))
(COMMENT **FASL** 25. (LAP LOOKUP SUBR))
(COMMENT **FASL** 34. (LAP GET-BENCH-INFO SUBR))
(COMMENT **FASL** 38. (LAP |RPUSH MACRO| SUBR))
(COMMENT **FASL** 76. (LAP PRINC-N SUBR))
(COMMENT **FASL** 103. (LAP ID SUBR))
'BOX
'LINE
(COMMENT **FASL** 105. (LAP FORMAT-BOX SUBR))
'ROW
'CHART
(COMMENT **FASL** 168. (LAP MAKE-A-CHART SUBR))
(COMMENT **FASL** 217. (LAP MAKE-TOP-ROW SUBR))
(COMMENT **FASL** 220. (LAP MAKE-DASHED-ROW SUBR))
(COMMENT **FASL** 246. (LAP MAKE-A-ROW SUBR))
(COMMENT **FASL** 759. (LAP ASSIGN-WIDTHS SUBR))
(COMMENT **FASL** 850. (LAP FORMAT-ALL-BOXES SUBR))
(COMMENT **FASL** 862. (LAP FIND-TOTAL-WIDTH SUBR))
(COMMENT **FASL** 880. (LAP PRINT-CHART SUBR))
(COMMENT **FASL** 894. (LAP PRINT-ROW SUBR))
(COMMENT **FASL** 915. (LAP PRINT-BOXES SUBR))
(COMMENT **FASL** 939. (LAP PRINT-LINE-N SUBR))
(COMMENT **FASL** 958. (LAP PRINT-LINE SUBR))
(COMMENT **FASL** 975. (LAP DO-CHART SUBR))
(COMMENT **** (LESSP (CAR ENTRIES) BEST) Closed compilation forced in function FIND-BEST)
(COMMENT **** (LESSP (CAR ENTRIES) BEST) Closed compilation forced in function FIND-BEST)
(COMMENT **FASL** 979. (LAP FIND-BEST SUBR))
(COMMENT **** (SAFE-QUOTIENT)
have been used but remain undefined in this file)
(COMMENT **FASL** TOTAL = 1154. WORDS)